#Deep Q Network for ENO
#Resetting the battery to BOPT on each day during training
#Increase no. of actions to 10

%matplotlib inline

import pulp
import matplotlib.pyplot as plt
from matplotlib.colors import ListedColormap

import pandas as pd
import numpy as np
from random import shuffle
from mpl_toolkits.mplot3d import Axes3D

import torch
import torch.nn as nn
import torch.nn.functional as F

np.random.seed(230228)

# Hyper Parameters
BATCH_SIZE = 24
LR = 0.01                   # learning rate
EPSILON = 0.9               # greedy policy
GAMMA = 0.9                 # reward discount
LAMBDA = 0.8                # parameter decay
TARGET_REPLACE_ITER = 24*7*4*2    # target update frequency (every month)
MEMORY_CAPACITY = 24*7*4*6      # store upto four month worth of memory   

N_ACTIONS = 10 #no. of duty cycles (0,1,2,3,4)
N_STATES = 4 #number of state space parameter [batt, enp, henergy, fcast]
HIDDEN_LAYER = 30

class ENO(object):
    def __init__(self, year=2010):
        self.year = year
        self.day = None
        self.hr = None
        
        self.TIME_STEPS = None
        self.NO_OF_DAYS = None
        
        self.BMIN = 0.0
        self.BMAX = 20000.0 #Battery capacity
        self.BOPT = 0.6 * self.BMAX #Assuming 60% of battery is the optimal level
        self.HMAX = 1000
        
        self.senergy = None #matrix with harvested energy data for the entire year
        self.fforecast = None #matrix with forecast values for each day
        
        self.batt = None #battery variable
        self.enp = None #enp at end of hr
        self.henergy = None #harvested energy variable
        self.fcast = None #forecast variable
    
    #function to map total day energy into day_state
    def get_day_state(self,tot_day_energy):
        if (tot_day_energy < 2500):
            day_state = 0
        elif (2500 <= tot_day_energy < 5000):
            day_state = 1
        elif (5000 <= tot_day_energy < 8000):
            day_state = 2
        elif (8000 <= tot_day_energy < 10000):
            day_state = 3
        elif (10000 <= tot_day_energy < 12000):
            day_state = 4
        else:
            day_state = 5
        return int(day_state)

    #function to get the solar data for the given year and prep it
    def get_data(self):
        filename = str(self.year)+'.csv'
        #skiprows=4 to remove unnecessary title texts
        #usecols=4 to read only the Global Solar Radiation (GSR) values
        solar_radiation = pd.read_csv(filename, skiprows=4, encoding='shift_jisx0213', usecols=[4])
        
        #convert dataframe to numpy array
        solar_radiation = solar_radiation.values
        solar_energy = np.array([i *0.0165*1000000*0.15*1000/(60*60) for i in solar_radiation])
        
        #reshape solar_energy into no_of_daysx24 array
        _senergy = solar_energy.reshape(-1,24)
        _senergy[np.isnan(_senergy)] = 0 #convert missing data in CSV files to zero
        self.senergy = _senergy
        
        
        #create a perfect forecaster
        tot_day_energy = np.sum(_senergy, axis=1) #contains total energy harvested on each day
        get_day_state = np.vectorize(self.get_day_state)
        self.fforecast = get_day_state(tot_day_energy)
        
        return 0
    
    def reset(self):
        
        self.get_data() #first get data for the given year
        
        self.TIME_STEPS = self.senergy.shape[1]
        self.NO_OF_DAYS = self.senergy.shape[0]
        
        print("Environment is RESET")
        
        self.day = 0
        self.hr = 0
        
        self.batt = self.BOPT #battery returns to optimal level
        self.enp = self.BOPT - self.batt #enp is reset to zero
        self.henergy = self.senergy[self.day][self.hr] 
        self.fcast = self.fforecast[self.day]
        
        state = [self.batt/self.BMAX, self.enp/(self.BMAX/2), self.henergy/self.HMAX, self.fcast/5] #normalizing all state values within [0,1] interval
        reward = 0
        done = False
        info = "RESET"
        return [state, reward, done, info]
    
    
    #reward function
    def rewardfn(self):
        mu = 0
        sig = 1000
#         return ((1./(np.sqrt(2.*np.pi)*sig)*np.exp(-np.power((self.enp - mu)/sig, 2.)/2)) * 2000000)-400


        if(np.abs(self.enp) <= 2400): #24hr * 100mW/hr
            return ((1./(np.sqrt(2.*np.pi)*sig)*np.exp(-np.power((self.enp - mu)/sig, 2.)/2)) * 1000000)
        else:
            return -100 - 0.05*np.abs(self.enp)
    
    def step(self, action):
        done = False
        info = "OK"
#         print("Next STEP")
        
        reward = 0
        e_consumed = (action+1)*50
        
        self.batt += (self.henergy - e_consumed)
        self.batt = np.clip(self.batt, self.BMIN, self.BMAX)
        self.enp = self.BOPT - self.batt
        
        if(self.hr < self.TIME_STEPS - 1):
            self.hr += 1
            self.henergy = self.senergy[self.day][self.hr] 
        else:
            if(self.day < self.NO_OF_DAYS -1):
                reward = self.rewardfn() #give reward only at the end of the day
                self.hr = 0
                self.day += 1
                self.henergy = self.senergy[self.day][self.hr] 
                self.fcast = self.fforecast[self.day]
            else:
                reward = self.rewardfn()
                done = True
                info = "End of the year"
                
        _state = [self.batt/self.BMAX, self.enp/(self.BMAX/2), self.henergy/self.HMAX, self.fcast/5]
        return [_state, reward, done, info]

class Net(nn.Module):
    def __init__(self, ):
        super(Net, self).__init__()
        self.fc1 = nn.Linear(N_STATES, HIDDEN_LAYER)
        self.fc1.weight.data.normal_(0, 0.1)   # initialization
        
        self.fc2 = nn.Linear(HIDDEN_LAYER, HIDDEN_LAYER)
        self.fc2.weight.data.normal_(0, 0.1)   # initialization
        
        self.fc3 = nn.Linear(HIDDEN_LAYER, HIDDEN_LAYER)
        self.fc3.weight.data.normal_(0, 0.1)   # initialization
        
        self.fc4 = nn.Linear(HIDDEN_LAYER, HIDDEN_LAYER)
        self.fc4.weight.data.normal_(0, 0.1)   # initialization
        
        self.out = nn.Linear(HIDDEN_LAYER, N_ACTIONS)
        self.out.weight.data.normal_(0, 0.1)   # initialization

    def forward(self, x):
        x = self.fc1(x)
        x = F.relu(x)
        actions_value = self.out(x)
        return actions_value

class DQN(object):
    def __init__(self):
        self.eval_net, self.target_net = Net(), Net()
        print("Neural net")
        print(self.eval_net)

        self.learn_step_counter = 0                                     # for target updating
        self.memory_counter = 0                                         # for storing memory
        self.memory = np.zeros((MEMORY_CAPACITY, N_STATES * 2 + 2))     # initialize memory [mem: ([s], a, r, [s_]) ]
        self.optimizer = torch.optim.Adam(self.eval_net.parameters(), lr=LR)
        self.loss_func = nn.MSELoss()

    def choose_action(self, x):
        x = torch.unsqueeze(torch.FloatTensor(x), 0)
        # input only one sample
        if np.random.uniform() < EPSILON:   # greedy
            actions_value = self.eval_net.forward(x)
            action = torch.max(actions_value, 1)[1].data.numpy()
            action = action[0] # return the argmax index
        else:   # random
            action = np.random.randint(0, N_ACTIONS)
            action = action
        return action
    
    def choose_greedy_action(self, x):
        x = torch.unsqueeze(torch.FloatTensor(x), 0)
        # input only one sample
    
        actions_value = self.eval_net.forward(x)
        action = torch.max(actions_value, 1)[1].data.numpy()
        action = action[0] # return the argmax index

        return action

    def store_transition(self, s, a, r, s_):
        transition = np.hstack((s, [a, r], s_))
        # replace the old memory with new memory
        index = self.memory_counter % MEMORY_CAPACITY
        self.memory[index, :] = transition
        self.memory_counter += 1

    def learn(self):
        # target parameter update
        if self.learn_step_counter % TARGET_REPLACE_ITER == 0:
            self.target_net.load_state_dict(self.eval_net.state_dict())
        self.learn_step_counter += 1

        # sample batch transitions
        sample_index = np.random.choice(MEMORY_CAPACITY, BATCH_SIZE)
        b_memory = self.memory[sample_index, :]
        b_s = torch.FloatTensor(b_memory[:, :N_STATES])
        b_a = torch.LongTensor(b_memory[:, N_STATES:N_STATES+1].astype(int))
        b_r = torch.FloatTensor(b_memory[:, N_STATES+1:N_STATES+2])
        b_s_ = torch.FloatTensor(b_memory[:, -N_STATES:])

        # q_eval w.r.t the action in experience
        q_eval = self.eval_net(b_s).gather(1, b_a)  # shape (batch, 1)
        q_next = self.target_net(b_s_).detach()     # detach from graph, don't backpropagate
        q_target = b_r + GAMMA * q_next.max(1)[0].view(BATCH_SIZE, 1)   # shape (batch, 1)
        loss = self.loss_func(q_eval, q_target)

        self.optimizer.zero_grad()
        loss.backward()
        self.optimizer.step()

dqn = DQN()
eno = ENO(2010)
NO_OF_ITERATIONS = 100
avg_reward_rec = np.empty(1)
for iteration in range(NO_OF_ITERATIONS):
    print('\nCollecting experience... Iteration:', iteration)
    s, r, done, info = eno.reset()
    record = np.empty(4)

    while True:
    #     print([eno.day, eno.hr])

        a = dqn.choose_action(s)
    #     print("Actin is ",a)
        #state = [batt, enp, henergy, fcast]
        record = np.vstack((record, [s[0],s[2],r, a])) #record battery, henergy, reward and action
    #     print("Action is" , a)
        # take action
        s_, r, done, info = eno.step(a)
    #     print([s_,r])
    #     print("\n")
        if eno.hr == 0:
            eno.batt = eno.BOPT #resetting the battery to the optimal value for each day
        dqn.store_transition(s, a, r, s_)

        if dqn.memory_counter > MEMORY_CAPACITY:
            dqn.learn()

        if done:
            print("End of Data")
            break

        s = s_

    record = np.delete(record, 0, 0) #remove the first row which is garbage

    reward_rec = record[:,2]
    reward_rec = reward_rec[reward_rec != 0]
    print("Average reward =", np.mean(reward_rec) )
    avg_reward_rec = np.append(avg_reward_rec, np.mean(reward_rec))

    action_rec = record[:,3]

    fig = plt.figure(figsize=(10,5))

    ax1 = fig.add_subplot(1,2,1)
    ax1.plot(reward_rec,'y')
    plt.ylabel("REWARD")
    plt.xlabel("Day")
    ax1.set_ylim([-400,400])

    ax2 = fig.add_subplot(1,2,2)
    plt.hist(action_rec, rwidth=0.75)#     plt.ylabel("Action")

    fig.tight_layout()
    plt.show()

avg_reward_rec = np.delete(avg_reward_rec, 0, 0) #remove the first row which is garbage
plt.plot(avg_reward_rec,'b')

Neural net
Net(
  (fc1): Linear(in_features=4, out_features=30, bias=True)
  (fc2): Linear(in_features=30, out_features=30, bias=True)
  (fc3): Linear(in_features=30, out_features=30, bias=True)
  (fc4): Linear(in_features=30, out_features=30, bias=True)
  (out): Linear(in_features=30, out_features=10, bias=True)
)

Collecting experience... Iteration: 0
Environment is RESET
End of Data
Average reward = -183.19181336602557

Collecting experience... Iteration: 1
Environment is RESET
End of Data
Average reward = -143.49165982832722

Collecting experience... Iteration: 2
Environment is RESET
End of Data
Average reward = -86.33816914847968

Collecting experience... Iteration: 3
Environment is RESET
End of Data
Average reward = -139.2459337128648

Collecting experience... Iteration: 4
Environment is RESET
End of Data
Average reward = -77.42564904999227

Collecting experience... Iteration: 5
Environment is RESET
End of Data
Average reward = -55.02475229580805

Collecting experience... Iteration: 6
Environment is RESET
End of Data
Average reward = -36.603791985386486

Collecting experience... Iteration: 7
Environment is RESET
End of Data
Average reward = -10.233265860639936

Collecting experience... Iteration: 8
Environment is RESET
End of Data
Average reward = -17.584612642816868

Collecting experience... Iteration: 9
Environment is RESET
End of Data
Average reward = -64.39293117137773

Collecting experience... Iteration: 10
Environment is RESET
End of Data
Average reward = -63.787298620799675

Collecting experience... Iteration: 11
Environment is RESET
End of Data
Average reward = -16.223547962862245

Collecting experience... Iteration: 12
Environment is RESET
End of Data
Average reward = -17.611411782443756

Collecting experience... Iteration: 13
Environment is RESET
End of Data
Average reward = -10.974390994213495

Collecting experience... Iteration: 14
Environment is RESET
End of Data
Average reward = -12.674591235216617

Collecting experience... Iteration: 15
Environment is RESET
End of Data
Average reward = -36.0356223393873

Collecting experience... Iteration: 16
Environment is RESET
End of Data
Average reward = -34.85871165050452

Collecting experience... Iteration: 17
Environment is RESET
End of Data
Average reward = -38.48653744299459

Collecting experience... Iteration: 18
Environment is RESET
End of Data
Average reward = -13.619993373018838

Collecting experience... Iteration: 19
Environment is RESET
End of Data
Average reward = -50.79046944409421

Collecting experience... Iteration: 20
Environment is RESET
End of Data
Average reward = -58.68097577686727

Collecting experience... Iteration: 21
Environment is RESET
End of Data
Average reward = -9.585838457133665

Collecting experience... Iteration: 22
Environment is RESET
End of Data
Average reward = -44.55840644535205

Collecting experience... Iteration: 23
Environment is RESET
End of Data
Average reward = -42.69165642527053

Collecting experience... Iteration: 24
Environment is RESET
End of Data
Average reward = -59.59142182987175

Collecting experience... Iteration: 25
Environment is RESET
End of Data
Average reward = -45.25606445146143

Collecting experience... Iteration: 26
Environment is RESET
End of Data
Average reward = -29.343983838687038

Collecting experience... Iteration: 27
Environment is RESET
End of Data
Average reward = -41.412524501195136

Collecting experience... Iteration: 28
Environment is RESET
End of Data
Average reward = -56.602099695795715

Collecting experience... Iteration: 29
Environment is RESET
End of Data
Average reward = -34.530793675650706

Collecting experience... Iteration: 30
Environment is RESET
End of Data
Average reward = -23.153513108231042

Collecting experience... Iteration: 31
Environment is RESET
End of Data
Average reward = -8.926700148834417

Collecting experience... Iteration: 32
Environment is RESET
End of Data
Average reward = -49.66437844640169

Collecting experience... Iteration: 33
Environment is RESET
End of Data
Average reward = -64.3831757741056

Collecting experience... Iteration: 34
Environment is RESET
End of Data
Average reward = -51.92682832684367

Collecting experience... Iteration: 35
Environment is RESET
End of Data
Average reward = -27.370541532083976

Collecting experience... Iteration: 36
Environment is RESET
End of Data
Average reward = -19.99844189529542

Collecting experience... Iteration: 37
Environment is RESET
End of Data
Average reward = -3.6009161220784205

Collecting experience... Iteration: 38
Environment is RESET
End of Data
Average reward = -14.419463421051574

Collecting experience... Iteration: 39
Environment is RESET
End of Data
Average reward = -50.64853114925193

Collecting experience... Iteration: 40
Environment is RESET
End of Data
Average reward = -47.59618991178252

Collecting experience... Iteration: 41
Environment is RESET
End of Data
Average reward = -38.43025157987815

Collecting experience... Iteration: 42
Environment is RESET
End of Data
Average reward = -15.773061690392492

Collecting experience... Iteration: 43
Environment is RESET
End of Data
Average reward = -11.404732400082583

Collecting experience... Iteration: 44
Environment is RESET
End of Data
Average reward = -46.735517609331346

Collecting experience... Iteration: 45
Environment is RESET
End of Data
Average reward = -18.395887352782264

Collecting experience... Iteration: 46
Environment is RESET
End of Data
Average reward = -28.85225685732555

Collecting experience... Iteration: 47
Environment is RESET
End of Data
Average reward = -46.58695420150046

Collecting experience... Iteration: 48
Environment is RESET
End of Data
Average reward = -15.777429016657342

Collecting experience... Iteration: 49
Environment is RESET
End of Data
Average reward = -32.61067719436447

Collecting experience... Iteration: 50
Environment is RESET
End of Data
Average reward = -32.02556922756117

Collecting experience... Iteration: 51
Environment is RESET
End of Data
Average reward = -32.96823801490901

Collecting experience... Iteration: 52
Environment is RESET
End of Data
Average reward = -31.41943068156126

Collecting experience... Iteration: 53
Environment is RESET
End of Data
Average reward = -35.451842502197415

Collecting experience... Iteration: 54
Environment is RESET
End of Data
Average reward = -52.8851338795379

Collecting experience... Iteration: 55
Environment is RESET
End of Data
Average reward = -35.355259421569905

Collecting experience... Iteration: 56
Environment is RESET
End of Data
Average reward = -20.891113091950327

Collecting experience... Iteration: 57
Environment is RESET
End of Data
Average reward = -43.05306669281091

Collecting experience... Iteration: 58
Environment is RESET
End of Data
Average reward = -16.341295912739636

Collecting experience... Iteration: 59
Environment is RESET
End of Data
Average reward = -36.861096363298785

Collecting experience... Iteration: 60
Environment is RESET
End of Data
Average reward = -38.97277425463836

Collecting experience... Iteration: 61
Environment is RESET
End of Data
Average reward = -55.83768658498843

Collecting experience... Iteration: 62
Environment is RESET
End of Data
Average reward = -32.038414350983516

Collecting experience... Iteration: 63
Environment is RESET
End of Data
Average reward = -46.231930658613244

Collecting experience... Iteration: 64
Environment is RESET
End of Data
Average reward = -23.040364549706972

Collecting experience... Iteration: 65
Environment is RESET
End of Data
Average reward = -46.23615902363927

Collecting experience... Iteration: 66
Environment is RESET
End of Data
Average reward = -68.52337883506158

Collecting experience... Iteration: 67
Environment is RESET
End of Data
Average reward = -33.63789930847125

Collecting experience... Iteration: 68
Environment is RESET
End of Data
Average reward = -26.32734582631722

Collecting experience... Iteration: 69
Environment is RESET
End of Data
Average reward = -39.214220318840596

Collecting experience... Iteration: 70
Environment is RESET
End of Data
Average reward = -34.54299503319918

Collecting experience... Iteration: 71
Environment is RESET
End of Data
Average reward = -73.89471179215968

Collecting experience... Iteration: 72
Environment is RESET
End of Data
Average reward = -57.78622934193847

Collecting experience... Iteration: 73
Environment is RESET
End of Data
Average reward = -62.7714665525943

Collecting experience... Iteration: 74
Environment is RESET
End of Data
Average reward = -25.385017564818995

Collecting experience... Iteration: 75
Environment is RESET
End of Data
Average reward = -35.42990147318228

Collecting experience... Iteration: 76
Environment is RESET
End of Data
Average reward = -43.1844841056458

Collecting experience... Iteration: 77
Environment is RESET
End of Data
Average reward = -47.514711087320414

Collecting experience... Iteration: 78
Environment is RESET
End of Data
Average reward = -37.09146927445498

Collecting experience... Iteration: 79
Environment is RESET
End of Data
Average reward = -36.59938680346116

Collecting experience... Iteration: 80
Environment is RESET
End of Data
Average reward = -43.775546065561684

Collecting experience... Iteration: 81
Environment is RESET
End of Data
Average reward = -37.62423327159563

Collecting experience... Iteration: 82
Environment is RESET
End of Data
Average reward = -7.299084933990273

Collecting experience... Iteration: 83
Environment is RESET
End of Data
Average reward = -3.8164404641538767

Collecting experience... Iteration: 84
Environment is RESET
End of Data
Average reward = -20.035609426491945

Collecting experience... Iteration: 85
Environment is RESET
End of Data
Average reward = -17.50319305537991

Collecting experience... Iteration: 86
Environment is RESET
End of Data
Average reward = -28.990198782498556

Collecting experience... Iteration: 87
Environment is RESET
End of Data
Average reward = -33.21093548146299

Collecting experience... Iteration: 88
Environment is RESET
End of Data
Average reward = -6.633195019037755

Collecting experience... Iteration: 89
Environment is RESET
End of Data
Average reward = -6.811006120356109

Collecting experience... Iteration: 90
Environment is RESET
End of Data
Average reward = -8.241792743280582

Collecting experience... Iteration: 91
Environment is RESET
End of Data
Average reward = -10.81842515460926

Collecting experience... Iteration: 92
Environment is RESET
End of Data
Average reward = -22.193752412630815

Collecting experience... Iteration: 93
Environment is RESET
End of Data
Average reward = -23.976149886887224

Collecting experience... Iteration: 94
Environment is RESET
End of Data
Average reward = -53.66956784404428

Collecting experience... Iteration: 95
Environment is RESET
End of Data
Average reward = -71.25621182622324

Collecting experience... Iteration: 96
Environment is RESET
End of Data
Average reward = -44.848757494316764

Collecting experience... Iteration: 97
Environment is RESET
End of Data
Average reward = -46.58925455570586

Collecting experience... Iteration: 98
Environment is RESET
End of Data
Average reward = -36.15632478724318

Collecting experience... Iteration: 99
Environment is RESET
End of Data
Average reward = -33.53303159994127

[<matplotlib.lines.Line2D at 0x7f1ff9c6f8d0>]

print('\nTesting...')
s, r, done, info = eno.reset()
test_record = np.empty(4)

while True:
#     print([eno.day, eno.hr])

    a = dqn.choose_greedy_action(s)
    
    #state = [batt, enp, henergy, fcast]
    test_record = np.vstack((test_record, [s[0],s[2],r, a])) #record battery, henergy, reward and action
#     print("Action is" , a)
    # take action
    s_, r, done, info = eno.step(a)
#     print([s_,r])
#     print("\n")
    if eno.hr == 0:
        eno.batt = eno.BOPT #resetting the battery to the optimal value for each day
   
    if done:
        print("End of Data")
        break
       
    s = s_

Testing...
Environment is RESET
End of Data

test_reward_rec = test_record[:,2]
test_reward_rec = test_reward_rec[test_reward_rec != 0]
plt.plot(test_reward_rec)

[<matplotlib.lines.Line2D at 0x7f1ff9d4d4e0>]

plt.plot(test_record[:,0],'r')

[<matplotlib.lines.Line2D at 0x7f1ff9c43b00>]

#Average Battery Percentage
np.mean(test_record[:,0])

0.7173049487786783

for DAY in range(eno.NO_OF_DAYS):
    START = DAY*24
    END = START+24

    fig = plt.figure(figsize=(10,4))
    st = fig.suptitle("DAY %s" %(DAY))

    ax1 = fig.add_subplot(141)
    ax1.plot(test_record[START:END,0])
    ax1.set_title("Battery")
    ax1.set_ylim([0,1])

    ax2 = fig.add_subplot(142)
    ax2.plot(test_record[START:END,1])
    ax2.set_title("Harvested Energy")
    ax2.set_ylim([0,1])

    ax3 = fig.add_subplot(144)
    ax3.axis('off')
    if END < (eno.NO_OF_DAYS*eno.TIME_STEPS):
        plt.text(0.5, 0.5, "REWARD = %.2f\n" %(test_record[END+1,2]),fontsize=14, ha='center')

    ax4 = fig.add_subplot(143)
    ax4.plot(test_record[START:END,3])
    ax4.set_title("Action")
    ax4.set_ylim([0,N_ACTIONS])

    fig.tight_layout()
    st.set_y(0.95)
    fig.subplots_adjust(top=0.75)
    plt.show()